home *** CD-ROM | disk | FTP | other *** search
/ Gekikoh Dennoh Club 1 / Gekikoh Dennoh Club Vol. 1 (Japan).7z / Gekikoh Dennoh Club Vol. 1 (Japan) (Track 1).bin / kowin / dockob / hello1.kob < prev    next >
Text File  |  1995-11-13  |  328b  |  12 lines
  1. /********************
  2. /* こんちは世界！１ *
  3. /********************
  4. WindowSimpleOpen( 0, WINX, WINY, 216, 48, 0 )        /* オープン
  5. end
  6.  
  7. func Eredraw( wno )
  8.     DrawClear( wno, 1 )                /* 灰色で塗りつぶす
  9.     DrawSymbol( wno, 24, 12, "こんちは世界！", 9, 24 )
  10.         /* (24,12) に、"こんちは世界！"と黒の 24ドットフォントで書く
  11. endfunc
  12.